1 Imports System.Data.OleDb
2 Module Module1
3     Public acscmd As New OleDbCommand
4     Public acsconn As New OleDbConnection
5     Public acsda As New OleDbDataAdapter
6     Public acsds As New DataSet
7     Public strsql As String
8     Public strreprotname As String
9     Sub connect()
10         acsconn.ConnectionString =
"Provider=Microsoft.ACE.OLEDB.12.0; Data Source=CLInventory.accdb; Persist Security Info=False"
11     End Sub
12 End Module


Gõ tìm kiếm nhanh...